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I. Program Objective 


/sis') 


The object of this program is to punch one 80-character card image 
per record of those records of any BCD tape specified by the user. This 
program is written in SPS for the IBM 1401. Input cards are punched in 
the described format to select those records of the BCD tape to be punched 
on card. The BCD tape remains unaltered. The output is punched 
cards. The records of the tape are taken to be consecutively numbered 
starting with the number one and going up to (potentially) 99999. * 

i— 


The program will halt with messages printed out (1) if an end of 
file is reached before the last record number requested; (2) if record 
numbers requested are not in an increasing sequence; (3) when all rec- 
ords requested have been punched (normal halt). 
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II. Program Usage 


Input: (1) The BCD tape containing records to be punched should be 

mounted on tape unit 3. 

(2) The card input specifies which records are to be punched, 
and should be in the following format: 

a N = column (10 -N + 1) to column (10 -N + 5): record with which 

punching begins 

b^ = column (10-N + 6) to column 10*(N + 1): record with which 

punching ends 


where N=0,l,2,3,... 

These ten digits continue across the card, and onto additional cards 
if necessary, with each pair of 5 digits selecting a sequence of records 
to be punched with the following restriction: 


III. Sample Solution 


Input card: 


columns 1 to 5 00003 

columns 6 to 10 00005 

columns 11 to 15 00008 

columns 16 to 20 00009 

columns 21 to 25 00009 

columns 26 to 30 00011 

columns 31 to 80 blanks 


Listing of input tape: 

record number 1: 
record number 2: 
record number 3: 
record number 4: 
record number 5: 
record number 6: 
record number 7: 
record number 8: 
record number 9: 
record number 10 
record number 11 
record number 12 
etc. 


12345A 

12345B 

12345C 

12345D 

12345E 

12345F 

12345G 

12345H 

123451 

12345J 

12345K 

12345L 


Output (punched cards): 


card number 1: 
card number 2: 
card number 3: 
card number 4: 
card number 5: 
card number 6: 
card number 7: 


12345C 

12345D 

12345E 

12345H 

123451 

12345J 

12345K (last card punched) 
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VI. Operating Instructions 


Input: (1) The input cards specifying records to be punched should be 

placed behind the program deck. 

(2) The input tape should be mounted on tape unit #3. Records 
are punched from this tape. 

Output: (1) Cards are punched out. The user may request that the 

IBM 1401 operator list these cards. 

A copy of the compressed program deck is kept on the 1401; thus the 
user need send only the input cards with the request card to the sample 
request card. 
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